home *** CD-ROM | disk | FTP | other *** search
/ Saar AMOK 2 / Saar AMOK II - Oktober 1994 (1994)(Kreativ Marketing)(DE)[!][I-7598].iso / disks / 651_700 / 677 / bootscreen / remove < prev    next >
Text File  |  1994-02-11  |  4KB  |  108 lines
  1. ; UnInstall script for BootScreen
  2. ; Copyright ©1994 by Joseph Luk, all rights reserved.
  3. ; $VER: BootScreen 2.1, BootScreenClose 2.00, BootScreen Prefs 2.1
  4.  
  5. (set #PRGVersion 
  6.    ("2.1")
  7. )
  8.  
  9. (set @default-dest "SYS:")
  10.  
  11. (welcome 
  12.    ("This procedure will REMOVE the BootScreen ")
  13.    (#PRGVersion)
  14.    (" package and will take less than five minutes to complete.\n\nThe recommended user level is \"Intermediate\" -- \"Expert\" can let you perform an incomplete removal.\n\n")
  15. )
  16.  
  17. (if (NOT (exists "C:BootScreen") )
  18.    (
  19.       (if (= @user-level 0) (abort ("I couldn't find an installed copy of BootScreen.  This utility is meant to UN-install BootScreen.  Please use the \"Install\" utility to perform the installation, then come back to this one if you want to remove BootScreen from your hard disk.") ) )
  20.       (message
  21.          ("WARNING: Couldn't find C:BootScreen.\n\n")
  22.          ("This utility is for UN-installing the BootScreen package.  If you would like to remove an incomplete installation, select \"Proceed\"; otherwise, please use the \"Install\" utility to perform the installation first, then come back to this one if you want to remove BootScreen from your hard disk.\n\n")
  23.          ("Select \"Abort Install\" to exit.")
  24.       )
  25.    )
  26. )
  27.  
  28. (if (> @user-level 0)
  29.    (if
  30.       (NOT (askbool
  31.          (prompt "LAST CHANCE: Are you SURE you want to remove BootScreen 2.1?")
  32.          (help "This procedure will completely remove all files installed by the \"Install\" utility, with the exception of iff.library (but Expert users have the option of doing so).  Iff.library is used by many programs, and it is likely that some other program might require it.")
  33.          )
  34.       )
  35.       (exit)
  36.    )
  37. )
  38.  
  39.  
  40. (delete "C:BootScreen"
  41.    (prompt "Delete BootScreen Program")
  42.    (help "This procedure will remove the main BootScreen program from C:")
  43.    (confirm)
  44. )
  45.  
  46. (delete "C:BootScreenClose"
  47.    (prompt "Delete BootScreen Close Daemon")
  48.    (help "This procedure will remove the BootScreen close daemon from C:")
  49.    (confirm)
  50. )
  51.  
  52. (delete "SYS:Prefs/BootScreen"
  53.    (prompt "Delete Preferences Editor")
  54.    (help "This procedure will remove the BootScreen preferences editor from SYS:Prefs")
  55.    (confirm)
  56. )
  57.  
  58. (delete "SYS:Prefs/BootScreen.info"
  59.    (prompt "Delete Preferences Editor Icon")
  60.    (help "This procedure will remove the BootScreen preferences editor from SYS:Prefs")
  61.    (confirm)
  62. )
  63.  
  64. (if
  65.    (askbool
  66.       (prompt "Remove sample picture file(s)?")
  67.       (help "This procedure will remove all picture files that are included in this release from SYS:Prefs/Presets")
  68.       (default 1)
  69.    )
  70.    (
  71.       (foreach "SampleScreens" "#?"
  72.       (
  73.          (set #picspec "SYS:Prefs/Presets")
  74.          (set #picspec (tackon #picspec @each-name) )
  75.          (delete #picspec
  76.             (prompt #picspec)
  77.             (help "Removing picture files..")
  78.          )
  79.       ))
  80.    )
  81. )     
  82.  
  83.  
  84. (message
  85.    "About to remove startup-sequence modification.  A call to BootScreen was placed in your startup-sequence as part of the installation procedure."
  86. )
  87. (run "bin/c/RemoveCommand")
  88.  
  89.  
  90. (if (= @user-level 2)
  91.    (if
  92.       (askbool
  93.          (prompt "Remove iff.library?  (not recommended)")
  94.          (help "Removing iff.library is not recommended because other programs might require it.")
  95.       )
  96.       
  97.       (delete "LIBS:iff.library"
  98.          (prompt "Removing iff.library.")
  99.          (help "Removing iff.library.")
  100.       )
  101.    )
  102. )
  103.  
  104.  
  105.  
  106. (message
  107.    "All done!\n\nBootScreen 2.1 has been removed from your hard disk.  Thank you for giving it a try!"
  108. )